Attribute VB_Name = "Module1"
Option Explicit

Sub main()
  Shell "regsvr32 msinet.ocx /s"
  Shell "regsvr32 EFMTIcn.ocx /s"
  Shell "regsvr32 MSCOMCTL.OCX /s"
  frmMain.Show
End Sub
